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ABSTRACT 

This Instructional unit of five lessons and 'four 
appendices is designed to acguaint both teacher and student with the , 
elementary aspects* of computer programming. The fir^t two sections 
contain background information in ^computer processes and in BASIC 
lan^fuage for a time-=sharing system for* those teachers who have 
limited backgrounds and experiences in computer science. JJ<e)5sons Z 
and II cover giving instructions in English and in BASIC; "lesson ^EII 
deals with translating instructions from English into BASIC; lesson 
IV introduces conditional control statements through simple programs; 
and lesson V looks into the use of subscripts in a BASIC progiam. 
Each lesson contains suggested teacher guestions and related 
exercises for students. Appendix A contains two programs to be put on 
tape and checked, during lessons II and IV. "Appendix B contains six 
handouts for use with lessons II through Vl. Appendix C contains the 
analysis of programs to find the roots of quadratic equations and 
also a summary of BASIC symbols. Appendix D contains programs for 
sums of series, dividing a line, and changing bases. (JBW) 
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PREFACE 



Since one important^ aspect of this unit is getting the Qtudents 
— not thG teacher — to initiate and follow through on a particular 
activity J we have let the teacher play the role of consultant and guide 
in conducting these classes. In most of these lessons it is only necea- 

9 

sary for the teacher to ask one or two questions or se^^^jjp the computer 
and pass out the v/ork sheets. We believe that if studentspare permitted 
to work through these lessons with a minimum of help,, they^yBdll be able 
to write simple programs that contain loops by the end of this unit. 

The first tx;o sections of this unit contain background information 
about computers. This information has been provided for those teachers 
who have limited backgrounds and experiences in computer science. 

This unit contains five lessons which should be done in the order 
in which they appear. The amount of time necessary to complete any one 
of them V7ill depend on the class. However, each of them can be completed 
in a normal class period. 

There are handouts in Appendix B to be reproduced for lessons II » 
III, IV, Vj, and VI ^ and programs in Appendix A to be put on tape and 
checked out for lessens II and IV. 

The appendicas also contain the analysis of some programs that 

r 

should be helpful to those students having difficulty with this unit, 
and several programs that cau be used xjith other units which the students 
may work through. 
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The ever-increasing uoo of high s eed digital computers is becoming 
an important factor vhich toucheo all areas of our daily lives. Bankp, 
retail outlets ^ grocery chains, educational institutions 5 research an^l 
Qcioatific investigators are making extensive use of computers and com- 
puterized services. Small organisations uhich find the cost of OT^ming 
or renting a computer prohibitive can t^tilise the benefits of the com- 
puter on a time-sharinp; basis at a fraction of the cos^t of o^-mership or 
rental . 

Because of its ability to operate at fantastic speec'. (the terra 
nanosecond 10 ^ seconds — has been coined to describe it) th© com- 
puter is especially useful where almost instantaneous answers are required 
or a great number of reiterative operations are necessary. 

We feel that the modern teacher and student should have some 
familiarity x-7ith the concepts of computer operation and programming. 
This unit is designed to acquain^^ both teacher and student with the 
elementary aspects of computer programming. Additional self-study will 
result in facility in use of this ncJern device. 

Contrary to popular belief, the computer is not an electronic 
brain capable of independent thought. Nor is it possible at the present 
time to talk to the computer and elicit a response. Communication with 
computer must be given in a lan^.uage that can be understood by the com- 
puter. 
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Computers are designed to be operated by a machine language — a 
oequence of coded coimnands which are stored in the memory unit until 
^ called into use by the control unit. Early programmers found it neces- 
sary to learn this machine language\"jhich be^rs no resemblance to any 
spoken tongues. Synthetic languages are being developed which are ' 
designed to bridge the gap between the spoken tongue and the machine 
language • 

The purpose of this unit is to get a feel for what is involved in 
writing a set of instructions so a computer can give the answer to some 
problemjr The instructions given to the computer constitute a computer 
program. The language we will use is BASIC (Beginner's All-pulrpose Sym- 
bolic Instruction Code) designed for use with the GE Time-Sharing service. 

HOVJ THE COr^UTER WORKS 

A diagram of the flow of information through a computer roughly 
resembles the one below. 



Input 



Storage/Memory 



Control 



Arithmetic/Logic 



Output 
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Input cQSiaiots of the set of stataaents which mal^e up the program. 
Input to the computer may ba tranamittad by punched cards 5 tapa, tale-- 
type, or form the keyboard on the coneole. The statemants may be Instruc-- 
tioas to the computer to perform certain operations or data to bo uoed 
in the execution of the instriictions. 

The G tor age/memory unit is uhere information is gtorsd until needed 
in the execution of 'seme part of the program. 

The arithmetic /logic unit is tsjhere the actual computations take 
place* This unit may adds subtract, multiply or divide; higher-border 
mathematics ±0 not done directly. This unit also performs certain logi- 
cal operations; it can determine if a number is positive or negative, 
zero or non-zero. 

The control unit acts in a supervisor^ capacity and exercises 

\ 

control over all units in the system. It coordinates the activities 
y of the^ other units by timing and directing the flow of information from 

one unit to another. ^ 

Output may be in the form of punched cards 5 punched tape, magnetic 
tape or printed sheets. The output consists of the results obtained from 
the computer operations. 



INTRODUCTION TO THE BASIC LANGUAGE FOR TllE GE TIME=SHARING SYSTEM 



It Is Important that students realize that a program is simply a 
set of statements In a computer language which speelfieo a sequence 
of Instructions that can be executca- by the ctsnputer just as instructions 
given in a human languajge (English, French, etc.) can be executed by 
htaaaas. These statements in general will vary from one language 
to another in order to conform to the rules of the language. 

I. Giving Instructions in English 

To get an intuitive feeling for eoimuaicating with a eomputcr, 
the teacher may play the role of a siaple computer and let the students 
give him instructions to e^cecute. Start by putting five boxes in a 
llnr on a table where all can see and drop face dovm in an end box 
the cards ace through five of each suit, already picked out. Say: 
A. I am a simple computer and you can <^ive|be instructions . 
Same things I can do, some I cannot > You will find out 
what: I can do as vc 9.0 alon^ . What s)lould,this slinple 

^ 

computer do with these cards? X/ 
Given some time to think about the problem, they usually t^ill 
ask, What cards arc those? l^en they do, show them the cards and say: 
I have the ace through five of each of the four suits . 



This gane vms adopted from I An A Simple Computer by Sam Ileff and 
Alice Ilankla of the rre-Collcgc Program. 
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Someone vjIII eventually say, "Sort thea either by suit, by numb|^, 
l>y color p or by odds/ evens." 

B. Hoi-; ^jould you instruct this simple coiaputer to sort the 
cards? 

Suppose they decide to sort thaa by suits, then they may 
give the following instructions: 

Put £he hearts in a box^ the clubs in another, and the 
diamonds in still another. 

But these instrucuions are too complex for a simple computer. 
Therefore, they must be broken dovm into several simple 
instructions, such as: 

Pick up the top card. 

Put it in box . 



C, l-Jhat techinque can i;e use to direct the computer to a if^iven 
box? 

They should say, '"Label all the boxes," Then, "Pick up a 
card in box 1," 
Put it in box 2.V 

D. Now, can you instruct this computer to sort the cards? 

If the answer is yes, thet^tart from the beginning to sort 
them. On instruction from the students, pick up a card 
from box 1 (without looking at it), and put it in box 2. 
If no one objects, pick up another card from box 1 (without 
looking at it,) and put it in hm 2. Sooner or later 
someone will tell you to READ THE CARD. 



/ 
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IX thlQ timG the teacher should oay: 
Suppoae WG otart grom the beginning and \^lte the statementa 
on the chalkboard, 

1. PICK UP A CARD FROM BOX 1. 

2. READ IT. 

3. IF 5^ PUT IT IN BOX 5. (Students usually have no 

problem uith this statement.) 

4. IF Aj, PUT IT IN BOX 4. 

5. IF 3, PUT IT IN BOX 3. 
^ 6, IF 2, PUT IT IN BOX 2, 

At this points the students may argue about v/hat to do 
with the ace. Usually, they will end up vjriting: 

7. IF A, PUT IT IN BOX 5. 
Execute these seven statements. 

K. Have we finished? 

"No J Repeat the steps." The students usually argue about 
th^ number of times the steps should be repeated. 

8. REPEAT 19 TIMES. 

Execute the statements nineteen times. 
F. NoWj» are we finished? 

If the students do not remember that the ace's and five's 
are in the same box, show them the cards that are in each 
box. 
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Hov; can v/e separate the ace's anJ five's? 
9. PICK UP A CARD FROM BOX 5. 
lb. PUilAD IT. 

11. IF A, PUT IN BOX 1. 

12. IF 5, PUT IN BOX 4. 

13. REPEAT 7 TIMES. 

Execute steps 9, lOp 11, 12 anJ 13 ^ then go and execute Ip 
2j> ,..). Tn ta they should vjrant to chan^o statements 8^ and 13 
to read: 

8. REPLATp STEPS 1 TIIROUGH 7, 19 TIMES. 

13. REPE.\T, STEPS 9 THROUGH 12, 7 TimS. 

Pause for sc^raeone to suf7,j>est the following statementa: 

14. PICK UP A CARD FROM BOX 4. 

15. PUT 11 IN BOX 5. 

16. • REPEAT, STEPS 14 MD 15p 3 TIMES. 

Hqv7 v/ill the coraputer knovj when V7e are f InisheH? 

17. STOP. 

Can v/e delete ,sonio of the v/ords in these statementa v;lthout 
changing the instructions? 




8 

ThlQ. was the final program: . • * * 



1. 


PICK, 


BOX \ ' 




2. 


READ 






3/ 


IF 5, 


PUT BOX 5 


- • 


4. 




PUT BOX 4 




5. 


IF 3, 


PUT BOX 3 




6. 


IF 2, 


PUT BOX 2 




7 


IF A, 


PUT BOX 5 




8 


REPEAT, 1 THROUGH 


7 1 Q TTP.TF<; 


9 


PICK, 


BOX 3 






REj\D 




• f 


11. 


IF A, 


PUT BOX 1 




12 


IF 5, 


PUT BOX 4 






REPEAT, 9 THROUGH 




14. 


PICK, 


BOX 4 




15. 


PUT\BOX 5 




16. 


REPEAT, 14 AND 15 


, 3 TIMES 


17. 


STOP 




• 
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Start from tne beginning and^ execute the entire program. 
Then check the cards at the end to see if they are in the right boxes. 
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Related Exerxlsea 



1. Write a program to sor^ by suit. Also/ arrange the catds in 
each box in ascending order. 
-*v^ Write a 8et of atatanenta that x^ill direct me to your home from 
here. (This assignment should lead to some very interesting 
discussions.) Two very Important ideas, should come out of these 
discussions: 

(a) The instructions must be given in a mutually 
understood language. 

(b) T)irtJctions Cleft, right, etc.), and street and 
highway names should be used for precision. 

Ask some of the students to read their instructions and ask: 

(a) ^^Thy did you wite your statements in English and not 

Spanish or French, etc.? 
(L) l^y did you list your Statements? Why did you not 
write them in paragraph foyrm? 

(c) Why v/ere street andjiighway names necessary? 

(d) l^at must oij^|^ow to be able to execute the 
instructions? - ^ , >^ 



II* Giving Instruetion* In Basic 

Ic Put Prograci P«l (Appendix A) on tape to store in the computer ^ 

at the h^Qlwid^vQ of this iQsoon. Dletrlhute liandout shaeSe, H-1 
(Appsadix B) aad do tha flrot part, one otateaent at a time. Each 
•ps^er should be chsckfid irith that of tha computer before going 
to the nmt etataeent. Ask th@ £©lloving questions t one at a tiUnOi 
to Qum up what has been Xeart^ed* ^ 

Wtot bfive you laagned abput tha Basic lanftuaj se item dolM 
■ theae Qtatemegifco? 
Socae of thG following quectiona may be answered in the course of 
tbia di0Cts80ion. 

(a) What wa Btozad i n location E and G at the beginning 

(b) llhy^fere the^ Btat^entB_nimh^TedX 

(c) What iQ^ the dlf Serene^ in mea ning of the a<suel sign in 
Basic a fcatoaaents and in elg;abraic at^atesQeuts? 

(d) V?hat arlihiBgtlc operatlona are u sed in Baalc? 

(e) What al^n to uged to repreaept each operation In Baoic? 

Connent: You may change all the ansti^ere In the Exercise by assigning 
a different cousiting number to A in atatement 10 of both 
tha vo?k s^eet and program. 



in 
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Related Btarclseg 

X£ A - 12 aad B - 4, write eac5a of the following otateaeato la 
Baale •© eUat the eeoputed ^alue ©£ each variable ie ao given: 
65^ 1, G « i • A ^-i^B 

A 

C o B * A ° B 



6 3. B " 



4 0 



3 



2 



B A 




to your progran on the eoapatcr to see If your gtataaents 

2. Tho oeeond part follows the aame precedure as the f iKSt part. 
The progrca for the oecoai port in also ?-lo Ask fthe following 
quaatloM. <m& at a tSiae, to swb up what haa been leaT:».ed. , 

(t) In wtmt og^_wilithe^Qgiput6r do _thg,,arittoe|j^ 

(b> Why ere pagept^^"»'« m arittoietlc (aprQeglQ^ 
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Kcleted Exerclae ' „ 

Wsifce five orltteeeic otaeesaenta ttat are acceptable to she 
eoiiputero TheUp imt tfe<aa ©o the computet to oee 1£ they arc. 



SIXo TsftSolfltlBg iafsar^jetleue Fro© Eaglioh t© Baste 

lo Mseslbuto haEdoue sheet H-2 (Appendix B)o Suggest ,t«o ftymbers for 
«s!ee\atiBg she Eagliofe atatsaenta la Part 1. 
(a> W^t_jaagw eg did yau get? 

l9u may need t® use two or tbree pairs of 
wmhexB beCor© the elass 1» ready to go on 
to t&e neKt queation. 

T© ^ielp et^dGntfl get started, ask the f©ilovlng 
Jtlois of qiii est ions; 

(1) How can you, tall the eOBiputar to pick 

iZ) »nMlA you tell the c omputgt- ^JL <^^^^? 

When the Basie statements correspoiiiinB to the Encllsh 
aea^easats have beeta wsieten, ask? 
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If Che ansvar is no, ask: 

How ^uld you cbanee tbe Baoie 8tatas>ent3 togiva 



tho aaae QasK-jQg jou got by QKGCutinig thcj English 

Whea they got the same answer with both ©eta of 
©f iastruetloBS, hma smaeone put his program on the 
computer. If the statanent EN© atfd atatc-aaent numbers 
have not hem iaeludadj add them in the appropriate 
places. The prograia should look like the following: 
5 LET A » acme, nuaber 

10 LET B » scm^ number 

20 LET C " 2 * A 

30 LET C » C 4- 7 

40LETC-C+3*B 

50 LET e a C - 11 

60 PUHT C 

80 EWD 
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1. While the above program is being put on fihe computer, the rest 
Bay work on part two of the work sheet. 

When these programs are understood, ask: 

^ (a) How can the program be v^itten so yio. can pick 

different pairs of numbers? (Answer; 10 INPUT A, B 
and delete statement 5 LET A ^ ? .) 
(h) How can we get this program to work for more than 
one pair of numbers? (Answer; 70 GO TO 10>) 

Related Easercises 

1, For any given counting number, i-Trite a program that will 
• find three consecutive odd numbers. 

2. Write a program that i-jill find the n(szr odd number greater 
than any given counting number, (The students should be 
told about the integer function LET Y ^ INT (X) for 

X -^^^ 5/2 assigns 'to Y the value 2 instead of 2.5.) 



IV. Conditional Control 

1. Put program (AppendiK A) on tape and store it in the computer. 
Distribute handout oheet H^-SA (Appendix B) and do the otatOTents, one 
statement at a time. Each ansuer should be checked uith that of 

the coiaputer before going to the ne3:t statement. Ask: 

What is the rule for determining tjhich set of statements 
will be executed ne^t? 

If there is no answer to this question, ask: 

(a) VJhen will the coiaputer f^o to t^ statement 
whose number follows the THEN? 

(b) IJhen will the computer the the nesgt statement 
in the sequence? 

The agreed upon rule must work for all ten statements. 

2. Distribute handout sheets H»3B (Appendix B) and have them work 
through and discuss the program one at a time. If the students 
would like to check their answers with those of the computer, they 
should put these programs on the computer and run them. 



f 
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Before running Program 2, the following statGmonts should be added,: 
15 PRINT "10" 
25 PRINT "20" " 
28 PRINT "30" 
45 PRINT "40" 

48 PRINT "50" • 

57 PRINT "55" 

58 PRINT "60" 
65 PRINT "70" 

77 PRINT "75" 

78 PRINT "80" 

^ By counting the number of times a statement number is printed, 
the Dtudnet can determine the number of times that statement was 
executed. They may also uoe their printout to retrace the steps 
of the computer in the program. 

Since some of the statements in Program 4 will be executed 
many times, suggest adding in counters instead of the PRINT 
statement^ as in Program 2 and PRINT statements before the END 
statement. 
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Add: 

13 LET A A + 1 
• 25 LET B B + 1 
32 LET C =^ C + 1 
34 LET D =. D + 1 

* 

45 LET E ° E •+ 1 

65 LET G =^ G + 1 

68 LE'f J J + 1 ^ 

85 LET K - K + 1 

88 LET L ° L + 1 

92 PRINT "10="; A; 20-"; B; 30-"; C; 35-"{ D;", 
94 PRINT "60-"; G;",70-"; J;", 80-"; K;", 90-"; L;",95-l" 

* 

Related £>:ercl8es 

1. Given four variables, C and D with previouQly defined 

valueo, OTite a sequence of "if, then" statements that ^d.11 
instruct the ccsputer to execute statement number 80, If all 
four variables have the same value. If one or more variables 
have a different value, tell the computer to execute stataaent 
45 instead. 



2 ^ 
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2. 



Given 



three variableo X, Y and Z with no two values the 



if the value of X is: 



(a) 



greater than both Y and Z, execute Qtatement 



(b) 



number 10 ne::t , 

leoo than Y but greater than Z, execute otatoii^nt 



number 20. nesit, 



(c) 



greater than Y but less than"Z, esiecute otateaent 



number 30 nezit^ and 



(d) 



lesa than both Y and eneeute Qtataaent number 



40 nejct. 



3. Write a program that will oum the-firot 20 counting numbero. 

4. Write a program that i^ill get the square root of the fi^st 
20 counting numbero , 

5. Write a program that td.ll find the first 20 odd positive 
integers. 

6. Write a program that id.ll find the prime numbers less than 
one hundred. 

V. Subscripts 

Distribute handout sheet IH4 (Appendix B). Work through the 
program as the Computer would and reberd. the printout. Allow 
students to check their answere with those of the computer. 
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Aak: 

!• Ho^ ere subscript q represent Qd In Basic? 

2. Can you think of a better way to handle this problem? 

Related EKerclses 

1. Set each value of an array called ID equal to the order of 
the VQlue-in £he array (that is, ID (1) ° 1, ID (2) ^ 2, 
etc.)o The array has length 20. 

2. Store the elements of array A in array B. 

3. Store the elements of array A in array B in reverse order. 

4. Find the Gf^llest number in an array of 10 numbers. 

5. Write a program that will find the Pythagorean numbers less 
than one hundred. 

6. Write a program that i'7i 11 subdivide a line eight times. 

7. Write a p^gram that will find the number of divisors of 
a number. 

8. Evaluate an N de^;ree polynomial. 

9. Arrange a sequence of numbers in ascending order. 

10. Find the roots of a polynomial equation to three decimal 
places. 
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APFEtlDIX A 
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FROGBA!-! FOR LESSON IZ 



•I 

1 


PRINT 


"ARE YOD READY TO DO FART 1 OR PART 2 


2 


INPUT 


L 




7 


LET I 


° 10 




9 


GO TO 


110 




10 


L^T Ar 


o 5, 




15 


CO TO 


135 




17 


A 


^ 5 




18 


db TO 


135 




20 


Yet b 


^ A - 


A A 


25 


GO TO 


135 




27 


LET B 


°>"A 




28 


GO TO 


135 




30 


LET C 


o B 


B/A 


35 


GO TO 


135 




37 


LET C 


° A/B 


" 1 


38 


GO TO 


135 




40 


LET A 


C3 B 4. 


Ml* ef/B 


45 


GO TO 


135 




47 


LET C 


^ C -¥ 


1 


48 


GO TO 


135 




50 


LET C 


a B 


(A + C)/A 


55 


GO TO 


135 




57 


LET B 


0 B * 


B + C 


58 


GO TO 


135 




60 


LET A 


a A « 


C T <d/B 


OD 


GO iO 


135 




67 


LET A 


° A '^ 


2 - B 


'68 


GO TO 


135 




70 


LET A 


° A/C 


* B 


75 


GO TO 


135 




77 


LET B 


° B - 


C + A 


78 


GO TO 


135 




80 


LET B 


0 B ^ 


(C/B) C/A 


85 


GO TO 


^35 




87 


LET C 


D B * 


C 


88 


GO TO 


135 




90 


LET A 


a 3 * 


A/C/(C - 2 * B) '^ 2 ' 


95 


GO TO 


135 




97 


LET B 


^ B/2 




98 


GO TO 


135 




100 


LET C 


° C ^ 


2/2 * (C - 2 * B) 


105 


GO TO 


135 




lp7 


LET A 


° C/B 


+ 12 


108 


GO TO 


135 






(Cont. on nejit page) 



110 


LET N - 1 




115 


PRINT // 




120 


PRINT "IF STATEMENT";!; "HAS JUST BEEN EXECUTED 


. WHAT NUMBERS ARE 


122 


PRINT "STORED IN A, B, C"; 




123 


LET M a 1 




130 


INPUT D, E, F , 




131 


IF M s 1 THEN 190 


• 


132 


IF L « 1 THEN 134 




133 


ON N GO TO 10, 20, 30. 40. 50. 60. 70. 80. 90. 


100 


134 


ON N GO TO 17, 27, 37» 47, 57* 67, 77. 87. 97. 


107 


135 


IF A <> D THEN 170 




140 


IF B <> E THEN 170 / 






IF C <> F THEN 170 * 






/PRINT "YOUR ANSVJER IS CORRECT" 






LET N= N + 1 




158 


LET I ° I + 10 




160 


IF I <= 107 THEN 120 ^ 




165 


GO TO 200 




170 


PRINT "iNCORREiCT ANSWER. TRY AGAIN." 




175 


LET M ° M + 1 




176 


LET A a X 




177 


LET B « Y 




173 


LET C ^ Z 




180 


GO TO 130 , 




190 


LET X « A 




193 


LET Y ° B 




194 


LET Z ^ C 




195 


GO TO 13^ 




200 


END 
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p - ?- 



/ 



J 

3 LET M - 10 

5 CO TO 110 

10 LET I - 20 

15 GO TO 135 

20 l.Kj\ I. - 30 

25 GO TO 135 

30 LET 1-80 

35 GO TO 133 

40 LET 1-50 

45 GO TO 135 

50 LET 1 ° 70 

55 GO TO 135 

60 LET\^- 90 . , 

65 GO T0\l35 

70 LET I - OC 

75 GO TO 135 

80 LET I " 40 

85 GO TO 135 

90 lEi I " 100 

95 €C TO 1-S 

100 LET 1-20 

105 GO TO 135 

110 LET N •■• j. 

120 PRIier "IF STAISMENT'';M;"aA2 JUCT PEEll EXECUTED, !'JHAT IS THE'" 

121 PP.IKT "STATEMENT NUIIBER 01' TriE ?TATE11/1NT TO BE E3U:rT'?-v' 
131 INPUT J 

133 OH K GO TO 10, 20, 30, 40. "SO, O, 70, 80, SO, 7CC 

135 IF I - J THEM 195 

185 PRIKT "mCORRECT ANSWER. XP7 AGAIl!. ' 

190 GO TO l>i 

195 PRINT "C08RFCT Al^'.SK,.i'.. 

198 PRINT / 

200 LET M «• M + 10 

210 LET II " N + 1 

220 IF 11 < 101 THFN 120 

230 en:: 
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f 

INSTRUCTIONS IN BASIC 



H - 1 



Below Is a sequence ©f, arithmetic foraula statements (Program) 
In the Basic Language to be eKecuted in the order they ara written. 
After each statement has been essecutad* what is the current value 
stored in each variable location aasuming each was zero at the 
beginning of the progroii^? 

PART 1 



ABC 



B 



10 


LET A 




5 


20 


^ LET B 


m 


"A 


30 


LET C 


- 


A/B^- i - 


40 


LET € 


- 


C + 1 




T U 




ti A n 4. 

i3 ij T W# 


60 


LET A 


■1 


A + 2 - B 


70 


LET B 


m 


B - C + A 


80 


LET C 


«, 


B * C 


90 


LET B 


m 


B/2 


100 


LET A 


m 


C/B + 12 




PART 2 






10 


LET A 


m 


5 


20 


LET B 


rs 


A - A,* A 




T FT r 


M 


R » R/A 


40 


LET A 


es 


B + A * C/B 


50 


LET C 


m 


B * (A + C)/A 


60 


LET A 


ts 


A * C + 2/B 


70 


LET A 


m 


A/C * B 


80 


LET B 


m 


C/A * B + (C/B) 


90 


LET A 


m 


B * A/C/(C - 2 * B) + 2 


100 


LET C 




C t 2/2 * (C - 2 * B) 



ENGLISH TO BASIC 
H - 2 

!• Can you execute the^ following instructions? 
Pick ti7o numbers. 

Double the first. \ 
Add seven. 

Add three times the second. 

f 

Subtract 11. 

\ 

VJhat do you get? 

/ : 

SiPCan you i^ita a statement in Basic that will eorrespond t@ each 
^ statement above? 

\ 

3. Can you execute the following instructions? ct,* 

Pick ttw numbers. 
Triple the second. 
Add eight. 
Subtract the first. 
Add seven, 
l^at do you get? 

4* Can you write a statement in Basic that will correspond to each 
statement above? 



CONDITIONAL CONTROL 
H " 3A 



After each statement in the following sequence haa been executed 
?9hat is t^e statement nvnnber of the statement that the computer will 
eKecute nest when X 10 and Y a 20? 



10 IF ( X ) < 3 THEN 50 
20 li* 2 * X - -Y THEN 70 
30 IF X + Y > 5 THIN 80 



40 IP I - X <- 5 THIN 60 



50 IF 4 * X - Y >« 15 THEN, 70 



60 IF X - 2 * Y < -20 THEN 90 



70 IF 3 * X - X > 15 THEN 60 



80 IF 4 * Y/-X <= -8 TEEN 40 
90 IF Y - 2 * X >" 10 THEN 20 



100 IF 2 * X + Y <> 10 THEN 20 



CONDITIONAL CONTROL 
H - 3B - 1 

1. What is the output for the following program? 

I I N 

10 LET K " 10 

20 LET I = I + 3 — 

30 IF I > N THEN oO " ' 

40 PRINT 1^ N ~ ~~ 

50 GO TO 20 . — — - — 

60 END 



2. Assume that the program shotm below has been completely OKecuted 
how many times was each statement enecuted? 



10 LET N 6 

20 LET I ° I + 2 

30 IF N < I THEN 55 

40 LET N ° N + 1 

50 GO TO 20 

55 LET L = N 

60 IF I - N > 10 THEN 75 

70 GO TO 20 

75 LET L =• I 

80 END 

I 



ERIC j 



33 



CONDITI0!jAL CONTROL 
H = 3B = 2 

Wiiat is the output for tho given data for the followlag program? 

M K 

10 LET K « 0 

15 LET J ° 1 ____ 

20 SEAD M 

30 IF M 0 THEN 60 

40 LET K '^^ M + J + K 

50 GO TO 70 
60 LET K ° K •> 1 
70 PRINT M, K 
80 LET J J + 1 
90 IF J <■» M THEN 20 
95 DATA 4, 0, 2 
98 END 



Assume that the program shown below has been completely executed, 
how many times 'was each statement executed? 



10 LET I ° 20 

20 LET N « I 

30 LET I - I 

35 IF 2 * I = N < 0 THEN 80 

40 LET H - SQR(N ■^ 2 + I -h 2) 

60 LET N - N + 1/2 

70 GO TO 30 

80 LET 1^°= I + 10 ' 

90 IF 100 - I > 0 THEN 20 

95 END 
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SUJ. SCRIPTS 
H = 4 
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What io £ho psiiitout of the following progrcp? 

10 LET W 1 

20 LET A(i53) = N * (W + l)/2 

30 PRINT K, A(N) 

40 LET N W + 1 

50 IF N 10 THEH 20 

60 END 



1st 
2nd 
3rd 
4 th 
5th 
6 th 
7th 

9th 
10th 



r 
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APPEMDIX C 



Bsppos® you tjantsd to solve the qu^atio equatton + 6k gg. 
You recall timt ths roots of a quadratic isquation iray found by r, 

the formula i. - _rb a >/b^3^g 

2a " 

t. ■ . ■ ' 

Ths foUa-7ing program will give the required roots. 

Bm^lQ teogrsm 1 

10 I-BT A 2 
15 LLT B = 6 
20 LJSr C ° °56 

25 UiT Y = £QR (B*3 - 4*A*C) or 25 Y « sc^ (B t 2 - 4*A*C) . 

30 i.m n (^BfY) /(2 * «u 

35 LLl? X2 = (-E-Y) / (2%) 

40 rpiiH' xi,>:2 

50 ED 

TlTe eonipiater vjill print:, 

4. -7 
S0l { ) mupt have idiat meanittg? 
Stot decs the syir-Jx)! "f" maan? 
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Program m, I aould be sds^ed to the solution of any guadratie 
eqmtion ^-atibi real, rcots by inssr-ci.n.g th^ nev; valiise for h, B and C 
in 10, 15 and 20, and Iceeping the other statstents the same. 

Suppose, hcvjever, that the quantity b^-4ac yields a negative 
nuffiber, v/nich ireans tiat the roots are iinsgina^. This can b© 
tested by inserting the folloi-ang statenents: 
28 IP Y < 0 wm 43 
43^RILmT "EDOTS AHS EiajGItmHJf" 
if ths oaiputation for Y yields a n^ativ© nuiribGr,^tti0 
ODiipat^ vdll go to stataiient nutiber 43 and print, "K)OTS ME 
BWiCmm^l" and then to stataient 45 which ends the program. If 
Y is not a negative number the oat^juter vdll proceed to statenents 
30, 33, 40, 43,50 and vn.ll print (for .tlie above valuss of A,B ^.d C) 

■ wcfis imGimm 

OfcviouGly, we do not vant statements 40 43 eKscuted for 
the same feet of values so vie insert a statement which td.ll cause th© 
^ eoiijjuter to miss statement 43 vtei 40 is ejcecuted. So we write 
"42 GO TO 50." 



Our ^Riplete prcgram noj reads: 
10 LES'A = 2 
15 LET B = 6 
20 LET C =3 -56 

25LETY^SQR (3 + 2- 4*A*C*) 

28 IF y < 0 THEN 43 

30 LET XI = (=-BfY) / (2*A) 

35 LET }C2 {=-E-Y) / (2*A) 

40 PRMr XI, X2 

42 GO TO 50 

A 

43 PKQvlT "FOOTS ABE IMM3l£>!ARY" 
50 EM) . ^ 

To solve any quadratic equation we can insert nsw values for 
A, B and C in statements 10, 15, 20 and isot alter the other steps. 
Uiis requires a new program for each equation. VHih a fmr changes 
we can cause the program to handle a series of equation as follc^^: 
10 REfiD A, B, C 

delate etatsmerits 15, 20 and 42 and add statoTsents 

41 GO TO 10 

44 GO TO 10 

46 DATA 2, 6, -56 
<; 47 DAEA 1, 3, 9 

48 DJVim 5, -4, 7 

49 mm -3, 2, -2 




Our progran no^ looks lilce tlxis: 

San ple Progrsm la 
10 A, B, C 

25 LET Y « SQR (B + 2 - 4*A*C) 

28 IF y < a wm 43 

30 LET XI ^ (=BfY) / (2*A) 
35 LET K2 =^ (-E-Y)/ (2*A) 

40 Hm^r X1//C2 

41 Gj '10 10 

43 PRINT "ROOTS ARE El'^EJ^iSf" 

44 GO TO 10 

46 DAT?v 2, 6, -56 

47 KEA 1, 3, 9 

48 UATA 5, -4,-7 

49 DAIA -3, 2, 2 

50 HmD 

The coEnputer v/ill now solve the folloi/ing equations: 

(1) Z-i^ + 6x - 56 = 0 
.-.7 

U) X + 3x + 9 = 0 

(3) 5x2 - 4s -=■ 7 = 0 

(4) ~3x^ + 2x + 2 = 0 



If 



40 



JtiB cxanputer vull print the follovdng: 

4 -7 " - . 

HOOTS ARE I feGIixff^ 

1.65 -.85 
-.55 1.216S6 
i OUT OF DATA Hi 10 
iTo avoid placing a long list of DATA statements in- the program, 
we can change statement 10 to read, 10 V^m A, B, C and delete stateroants 
46, 47 and 49. Mien the conputer executes statement 10, a question 
mark ivill be printed. Values for A, B and C can be altered on tJie 
teletypewriter separated by cxanrnias. For exanple: for- the equation 
6x2 - 4x - 10, v;e enter 6, -4, and -10. Our print out would look like 
this: 

? 6, -4, -10 

1.6fa66 -1 
'•'^ 3, 7, -5 

.57333 -2.9066 
? 4, -3, 12 

ROOTS ARE IMAGINARY 

7 

©lis vdll continue as long as values are su^jpiied fcxr the variables 
A, B, and C. We get out of the program by typing STOP on the tele- 
typ©i*riter; 
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Vte nsentioned earlier that there are several types of stataognts 
in elementary Basic. Seven of these artj included in Sani5el Program-la. 
Let us reviai^ the use and me^ni^g of each. 

• Statement 10 HEftP A, B, C directs the ccnputer to assign values 
to the variables listed according to the available nunbers in a 
R-^. stateinent. (A DATA statement must acconpany a READ statement. ) 
His oatiputer vail assign values as follows: A=2, B=^6, 0^-56; 
the next time around, A - 1, b ^ 3, C - 9, and etc. , until all numbers 
presented as data have been used. 

Statement 25 LLT Y = SQR (B + 2 - 4*A*C) directs the .canputer 
to f i^id a value for the es^ression on the right and assign that value 
to the variable Y. 

Statement 28 Y < 0 THHsl 43 directs the canputer to check to see if 
the condition Y < 0 exists and to go to a definite place in the program. 
In this case, if Y is negative, statement 43 is ta be executed next, 
other wise statanent 30. . ^ 

Statanent 40 PRDJT XI, X2 directs the ccaiputer to print out the ' 
values for the variables XI and x2 which foliar. Any inf drmation enclosed 
within quotation marks following a PRINT statement (see Ifo. 43) will be 
printed by the coirputer;> 

Statement 41 ^ TO 10 causes the computer to go directly to the 
statement named. In this case the conpiiter goes to Statement 10, 
which is a JEAD statement, hnd looks for data to assign to the variables 
A, B, and C» ' " 
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statement 46 DAT^ 2, 6, -56 supplies the cattputer with values to 
be assigded to variables contained in READ statements. 

Statement 50 inforais the ccaiiputer that the pro-am is now 
cxarpleted and brings the operation to a halt« 

Statement 10 IKPUT A, B, aM C (in our variation) causes the catputer 
to print a' question mark (?) and wait for three values to be typed on. 
tiie teletypevariter. 

FOR and IvIBCT statements are used to creat a "loop;" that is, a 
set of statements to be e^^cuteJ a number of tunes. Kote the follovang 
exartples: We want to print the squares and cubes of the first 50 integers. 
The program belov; will this: 

4 LET A = 1 f 2 

5 LET B ^ 1 + 3 

10 FBINT "1,"; A, B 

12 LET A = 2 f 2 

13 LET B = 2 f 3 
15 PRIIOT "2"; A, B 



98 LET A 50 + 2 

98 LET B - 50 f 3 
200 PRIMP "50;'' A, B' 
205 END 

Our program will contain 151 lines. 
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E/ using a FOR . . . NDCT loop we can do the same program with 
only 6 lines. 

10 FOR X = 1 TO 50 

12 LET A ^ X f 2 

13 lijr B = X f 3 

« 

15 PRIMT X, A, B 

20 NESer X 
25 EMD 

Hie cOTiputer seta X = 1, exacutes statetients 12, 13 and 15^. 
statenienty20 caiases it to incn^se X by 1 and return to 10. Then 
continue until X equals 50. The amount of increase (or decrease) can 
be changed by including ^ STEP vath the FOR statenent. For Example; 
10 FOR X 1 TO 50 STEP 2, vTill cause the COTiputer to increase X by 
2 each time through the loop and the values for the squares and cubes 
of the o^ integers frcan 1 to 50 will be printed out. The value of 
a st^ may be negative or positive. To print the values of the numbers 
in reverse order v7e vjould program, 10 FOR X - 50 TO 1 SIEP -1 and the 
caiputer vjill printout the values for 50 first, then 49, and 
continue until it has coitpleted the loop. 
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m^'nm OF s^moLS 

Syirixal Exanpla Meaning 

+ A + B Addition, Add B to A. 



/ 
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Substractien, Subtract B frcm A. 
Multiplication, Multiply B by A. 

Divisil^n, Di^de A by B. 

3 

♦ B t 3 Raise D to 3rd pamr, B . 

^ A ^ B The value of B ia assigned to A. 

< A < B Less than, A is less than B. 

A <= B Less than or equal to, A is less than 

or equal to B. 

> A > B Greater than, A ia greater tiian B. 

>= A B Greater than or equal to, A ia greater 

than or equal to B. 

<> A <> B Is not less than or greater than, A - B. 



The last six gynbols are in IF ,THEM ©tatentents for the 
<^nparism of ^m^ftibjim. ThB rarputar doae Basic qparatiaie in 
tit© follovmig oid^: raise to a poorer, ntultiplication or di^ion^ 
th^ laddition or subtaraction* For essatple, in the oi^ressicsn 
A + ^ * C f Dy^ - P, tiie corputer vjould raise C to D power, multiply 
that result by B, divide that result ty E, add A to tiiat value, ttim 

sii±*rac± F fxt^ tit© result. It is ^juimlent to the al<^^raic ^{pression 

^ + ^ > ^ ^ / 

■ E Bie order cen,^ chmiged by tiie u^e of parenthaeea as 

the odffputer e^^ecutes the e^^reesion inside tiie parentheses firat. To 
( (A B) > fc)D 

evaluate e - F v-ie wouM v;rita1 ( ^ + B) * C) f D/(E - P) • 

Now the oorpxiter adds A and inultiplies the results by C, raises that 
value to the D porter and divides the result by tiie diffeirenoe of E and P, 
Certain nathsnatical functions can be executed by the oarpiiter, one 
of vdiich we have alreac^ used, SQR ( ) . These functions are given 
special three-letter names and have the follofrang; meanings: 
Function Meaning 



SIN (X) Find tiie sine of ^ 

COS (X) Find'^'the cosine of x ) X is ^ angle measured 

Tm (X) Find the tan^nt of x in radiais. 

ATN (X) Find the arctangent of x! 

EXP (X) Find e^ 

K)G (X) Find the natural logarithm of x (In X) 

ABS (X) Find the absolute value of X 

SQR (X) Find tiie square root of X 

EOT (X) Find the greatest integer not greater than X 



i) 




^v&n th© foUpiiisig program, tell vdiat each statement means or 
v*iat action is taken by tiie aarputar and til© valines for the v^ables 
in @a£h st^. 

10 PRDW "Tins I'lELL TEST TOUR U^E^^^BASIC" 

20 BEm X, Y 

25 IP X = Y Tim 45 

30 LET X = Y 

35 Km) Y 

40 GO TO 25 

45 LET A = SQR (X) 

50 LET B INT (a) 

55 FOR R = 1 OD B 

60 LET I = X - R f 2 

65 DJESer R 

70 PRINT "mm DO YOU ESeTBME FOR I"; 

75 INPUT G 

80 IF ABS (I - G) < 5 THEN 95 

85 PRIDJT "NOT SO GOOD, TRY -RGMN" 

90 GO TO 70 

95 PRINT "VERY GOOD. NOW WRITE YOUR CM PEDGRAM" 

100 DATA 243, 15, 85, 500,^-650, 90, 43, 725, 340, 169, 169 

105 B3D 
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APPENDIX D 



SUMS OF SERIES 



Program 


No. 1 


10 


LET N « H + 1 


20 


LET A - 1/N 


30 


' LET B - 1/M i 2 




LEi ® SI + A 


50 


LET S2 « S2 -f B 






70 


IF N < 10 THEN 10 


80 


mm 






Prograia 


No. 2 



Here ±q an altarnative ^rdgram that gives the sum of the series 

for any number of tenas K, where the value of K Is put ia each time. 

•i ' 

10 INPUT K 

20 FOR N «= 1 TO K 

25 LET A « 1/N 

30 LET B « 1/N t 2 

35 LET 31 - SI + A 

40 LET S2 - S2 + B 

45 NEXT N 

50 PlIHT "THE SUMS OF THE FIRST" ;K;"TESMS EQUAL";S1,S2 

60 GO TO 10 ' - 

70 END 



DIVtDiNG A Lim 



Program Ko. 1 , , 

1 A(313), B(513) 

2 PtoT "NUI-IBEa OF DIVISIONS OF THE LINE IS" 

3 J INPUT K 

4 LET J a 0 
6 LET A(l) a 1 
8 LET A(2) 1 

10 LET J J +■ 1 , 

12 LET N ° 2 + J 

15 LET B(l) c ACl) 

- 17 LET 14 ° 2 

20 FOa I 2 TO N STEP 2 

25 LET B(I) = A(M) + A(M"1) 

30 LET B(I+1) - A(M) 

33 LET 14 ° M + 1 

35 NEXT I 

40 FOR I 1 TO K+1 

45 LET A(I) " B(I) 

50 NEXT I 

" 51 PRINT / 

53 FOE I ^ 1 TO N+1 

54 PRINT A(I) 
60 IF J < K THEN 10 
70 END 



f 
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Frogram No. 2 



This program divides the line and determines the frequency of 
each number. 



1 DIM A(513), B(513) 

2 PRINT "NUl-IBER OF DIVISIONS OF THE LINE IS"; 

3 INPUT K 

4 LET J s 0 

6 LET A(l) ° 1 

8 LET A (2) ° 1 

10 LET J ° J + 1 

12 LET N ■=> 2 + J 

15 LET B(l) ° A(l) 

17 LET M ° 2 

20 IJOR I 2 TO N STEP 2 

25 LET 3(1) = A(M) + A(M-l) 

30 LET B(I+1) - A(M) 

33 LET M ^ M + 1 

35 NEXT I 

40 FOR I ° 1 TO N+1 

45 LET A(I) - B(I) 

50 NE}{T I 

60 IF J < 1 THEN 10 

65 LET L ° 2 

70 LET C(L) ° A(2) + A(l) 

75 FOR I ° 2 TO N 

80 LET B(I+1) - A(I+1) + A(I) 

85 IF B(L) >° B(I+1) THEN 100 

90 LET L ° L + 1 

100 NEXT I 

110 PRINT "NUMBER OF DIVISIONS MADE IS"; J 

112 PRINT "NUMBER FREQUENCY" 

115 FOR A ° 1 TO B(L) 

120 LET X - 0 

125 FOR M =■ 1 TO N+1 

130 IF A(M) <> A THEN 200 

150 LET X ° X + 1 

200 NEXT M 

205 IF X ° 0 THEN 220 

210 PRINT TAB(2);A;TAB(10);X 

220 NEXT A 

240 IF J < K THEN 10 

250 END 

0. 
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CHANGING BASES 



Program No. 1 



1 


DDI R(15) 




2 


PRINT "THIS PRCGIAM IS DESIGNED TO 


CHANGE A NUMBER 


4 


PRINT "FROM BASE 10 TO A SMALLER Bi 


\se" 


6 


PRINT 




B 


PRINT "ENTER YOUR NU^ffiER AND BASE" 




10 


INPUT N B 




12 


IF N o 0 THEM 170 




13 


PRINT 




14 


LET A a 0 




18 


LET M « M 




20 


LET X " M/B 




30 


Tf FT A «B A -*» 1 

Arfii^JL Zri ^ tfi ■ X 




40 


T.FT 13 if A ^ C3 M « "PL * TWT(r^> 






li* Lkily^ji) ^ U xcUilN /U 




60 


LET M » INT(X) 




65 


GO TO 20 




70 


LET S - 0 




73 


FOR D - A TO 1 STEP -1 




75 


LET S » 10 * S + R(D) 




80 


NEXT D 




84 


PRINT N; "IN BASE 10 EQUALS" ;S; "IN 


BASE";B 


105 


PRINT 




110 


GO TO 8 




120 


END 





Program No. 2" 

2 Dill Y(25) , 2(25) 

4 PRINT "THIS PROGEAM IB DESIGNED TO CHANGE A NUIfflER' 

6 PRINT "FROM A SmLER BASE TO BASE 10" 

8 PRINT 

10 PRINT "ENTER YOUR NUMBER AND BASE" 

12 INPUT N, B 

13 IF N a 0 THEN 400 

14 PRINT 

16 LET A ° 1 

17 LET P ° N 

18 LET X ^ N/10 
^\ 20 LET W ° INT(X) 

\25 LET M ° W * 10 

3©^^ LET Y(A) ° N - M 

35 \l¥ Y(A) B THEN 300 



50 
52 


11 N ° 0 THEN 58 
LET'lA ° A + 1 




55 
58 


GO TO 18 
LET-^Zd) = Y(l) 




60 


FOR D '^^^ 2 TO A 




65 


LET Z(D) °Y(D) * B 


+ (D - 1) 


70 


IF D = A THEN 100 




75 


NEXT D 




100 


LET S ■= 0 




102 


FOR F ° 1 TO D 




104 


LET S S + Z(F) 




106 


IF F ° D THEN 200 




108 


NEXT F 




200 


PRINT P; "IN BASE"; 


B; "EQUALS" ;S; "IN BASE 


204 


PRINT 




206 


GO TO 10 




300 


PRINT "THERE IS NO 


SUCH NUMBER IN BASE"; 


302 


PRINT 




304 


GO TO 10 




400 


END 





40 




